/cir {0 360 arc stroke} bind def

/src {setrgbcolor} bind def

/st {stroke} bind def

/mt {moveto} bind def

/lt {lineto} bind def